home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wtek0693.zip / OOPALLEY.ZIP / SEQCLTN.CPP < prev    next >
C/C++ Source or Header  |  1993-04-27  |  1KB  |  49 lines

  1. #include "seqcltn.h"
  2.  
  3. #define THIS    SeqCltn
  4. #define BASE    Collection
  5. DEFINE_CLASS(SeqCltn,Collection);
  6.  
  7.  
  8. void SeqCltn::atAllPut(const Object&)
  9.     { derivedClassResponsibility("atAllPut"); }
  10.  
  11. void SeqCltn::deepenShallowCopy()
  12. {
  13.     BASE::deepenShallowCopy();
  14. }
  15.  
  16. Object* SeqCltn::first() const
  17.     { derivedClassResponsibility("first"); return 0; }
  18.     
  19. int SeqCltn::indexOf(const Object&) const
  20.     { derivedClassResponsibility("indexOf"); return 0; }
  21.     
  22. int SeqCltn::indexOfSubCollection(const SeqCltn& /*cltn*/,
  23.                                   int /*start*/) const
  24. {
  25.     derivedClassResponsibility("indexOfSubCollection"); return 0;
  26. }
  27.     
  28. Object* SeqCltn::last() const
  29.     { derivedClassResponsibility("last"); return 0; }
  30.  
  31. Object* SeqCltn::doNext(Iterator& pos) const
  32. {
  33.     if (pos.index < size()) return at(pos.index++);
  34.     return 0;
  35. }
  36.  
  37. void SeqCltn::replaceFrom(int /*start*/,
  38.                           int /*stop*/,
  39.                           const SeqCltn& /*replacement*/,
  40.                           int /*startAt*/)
  41. {
  42.     derivedClassResponsibility("replaceFrom");
  43. }
  44.  
  45. void SeqCltn::indexRangeErr() const
  46. {
  47.     DTerror("Index out of range: ",className());
  48. }
  49.